oxenstored: Always log something at start of day (if logging enabled at all)
authorIan Campbell <ian.campbell@citrix.com>
Thu, 15 Dec 2011 16:53:52 +0000 (16:53 +0000)
committerIan Campbell <ian.campbell@citrix.com>
Thu, 15 Dec 2011 16:53:52 +0000 (16:53 +0000)
Otherwise at the default level we rarely log anything at all.

A completely empty log file is a good sign, but only if you know you are
looking in the right place...

Signed-off-by: Ian Campbell <ian.campbell@citrix.com>
Acked-by: Ian Jackson <ian.jackson@eu.citrix.com>
Committed-by: Ian Jackson <ian.jackson@eu.citrix.com>
tools/ocaml/xenstored/logging.ml
tools/ocaml/xenstored/xenstored.ml

index 7152b4ec6c4177a251fef235dbadcb5ea95d025a..bc3a2ea01b883835dba8365613777c5d89760601 100644 (file)
@@ -117,6 +117,9 @@ let init_xenstored_log () =
                        make_logger 
                                !xenstored_log_file !xenstored_log_nb_files !xenstored_log_nb_lines
                                !xenstored_log_nb_chars ignore in
+               let date = string_of_date() in
+               logger.write ("[%s|%5s|%s] Xen Storage Daemon, version %d.%d") date "" "startup"
+                 Define.xenstored_major Define.xenstored_minor;
                xenstored_logger := Some logger
 
 let xenstored_logging level key (fmt: (_,_,_,_) format4) =
index a86d558df7ac3a7e2cba4f012f46884d731eea47..fdea41a3bbcdba8e87d22080f3f7f558ba29b5ff 100644 (file)
@@ -284,9 +284,6 @@ let _ =
                Logging.init_access_log post_rotate
        end;
 
-       info "Xen Storage Daemon, version %d.%d"
-            Define.xenstored_major Define.xenstored_minor;
-
        let spec_fds =
                (match rw_sock with None -> [] | Some x -> [ x ]) @
                (match ro_sock with None -> [] | Some x -> [ x ]) @